home *** CD-ROM | disk | FTP | other *** search
/ Aminet 33 / Aminet 33 - October 1999.iso / Aminet / util / batch / boot-startup.lha / Boot-startup2 < prev    next >
Encoding:
AmigaDOS Script File  |  1999-07-30  |  2.0 KB  |  107 lines
  1. .key dummy
  2. .bra {
  3. .ket }
  4. requestchoice >env:rq{$$} "Startup Choice" "Click on the option of your choice*n*n1,2 & 3 can't be loaded after WorkBench" "T0" "Cannon Fodder" "Pinball" "LionKing" "Menu1" "WorkBench"
  5. if $rq{$$} EQ "0"
  6.     skip out
  7. endif
  8. if $rq{$$} EQ "1"
  9.     skip tzero
  10. endif
  11. if $rq{$$} EQ "2"
  12.     skip cf
  13. endif
  14. if $rq{$$} EQ "3"
  15.     skip Ball
  16. endif
  17. if $rq{$$} EQ "4"
  18.     skip lionking
  19. endif
  20. if $rq{$$} EQ "5"
  21.     skip Menu
  22. endif
  23. lab tzero
  24. c:setpatch
  25. Assign >NIL: T: RAM:T
  26. Assign >NIL: CLIPS: RAM:Clipboards
  27. Assign >NIL: REXX: S:
  28. Assign >NIL: PRINTERS: DEVS:Printers
  29. Assign >NIL: KEYMAPS: DEVS:Keymaps
  30. Assign >NIL: LOCALE: SYS:Locale
  31. Assign >NIL: LIBS: SYS:Classes ADD
  32. Assign >NIL: HELP: LOCALE:Help DEFER
  33.  
  34. BindDrivers
  35. C:Mount >NIL: DEVS:DOSDrivers/~(#?.info)
  36.  
  37. IF EXISTS DEVS:Monitors
  38.   IF EXISTS DEVS:Monitors/VGAOnly
  39.     DEVS:Monitors/VGAOnly
  40.   EndIF
  41.  
  42.   C:List >NIL: DEVS:Monitors/~(#?.info|VGAOnly) TO T:M LFORMAT "DEVS:Monitors/%s"
  43.   Execute T:M
  44.   C:Delete >NIL: T:M
  45. EndIF
  46. Assign T0Save: "Work:GAMES/T0"
  47. Assign T0Editor: "Work:GAMES/T0/T0Editor"
  48. work:
  49. games
  50. t0
  51. t-zer0
  52. skip out
  53. lab cf
  54. work:
  55. games
  56. cannonfodder
  57. execute cannonfodder
  58. skip out
  59. lab Ball
  60. work:
  61. games
  62. mania
  63. mania
  64. skip out
  65. lab lionking
  66. work:
  67. games
  68. cd "lion king"
  69. run "lion king"
  70. endcli
  71. lab Menu
  72. execute s:boot-startup
  73. unsetenv rq{$$}
  74. endcli
  75. endif
  76. lab CD
  77. mount CD0:
  78. requestchoice >env:cdrom{$$} "CD Boot" "Click on option of your choice" "RoadKill" "CD32 Boot" "Cancel"
  79. if $cdrom{$$} EQ "0"
  80.     execute s:boot-startup
  81.     unsetenv cdrom{$$}
  82.     unsetenv rq{$$}
  83.     endcli
  84. endif
  85. if $cdrom{$$} EQ "1"
  86.     skip roadkill
  87. endif
  88. if $cdrom{$$} EQ "2"
  89.     skip cd32
  90. endif
  91. lab roadkill
  92. requestchoice >env:ok{$$} "RoadKill" "Check RoadKill Disk is in CD-Rom drive*n*nClick OK when ready to play" "OK"
  93. if $ok{$$} EQ "0"
  94.     if exists roadkill:
  95.         skip cd32
  96.     endif
  97. endif
  98. skip cd32
  99. lab cd32
  100. system3.1:wbstartup/cyberpatcher
  101. system3.1:idefix/cd32/cd32  
  102. skip out
  103. lab out
  104. unsetenv rq{$$}
  105. c:setpatch QUIET
  106. execute s:startup-sequence-cont
  107.